Запись правильного одиночного блокa Character Array: c DIM-разметкой

God Mode:

New File [Запись Character Array.tzx]		; Создать новую виртуальную кассету для записи данных
Cassette Recorder [Record]			; Включить виртуальный магнитофон на запись, открыв телепортационное окно 1232 поставив команду LD H, H
Debugger					; Открыть отладчик для ввода данных
Dec						; Переключить отображение чисел в десятичный режим
Go To 23300					; Переместиться по памяти на нужный адрес
23300 <-- 1 40 0				; DIM-разметка массива (40) одиночная цепочка 40 символов (см. устройство DIM в книге)
23303 <-- 22 11 0 16 3 19 1 17 6 		; Атрибуты выводимого текста
23312 <--MAMA, PAMA ga KACCETA Radiorama	; Выводимый текст

17996 <-- 23300 0				; Стартовый адрес для блока данных и сброс после записи
18000 <-- 2					; Тип блока Character Array:
18001 <-- Radiorama+				; Имя заголовка
18011 <-- 43 0 0 193				; Планируемая длина с DIM-разметкой и код буквы символьного массива A +192
       
IX <-- 18000					; Указать место размещения шаблона заголовка
SP <-- 17996					; Создать временную SP-башенку в любом свободном месте
PC <-- 2436					; Установить Стрелочку на запускаемую подпрограмму
Trace						; Выйти из отладчика и запустить программу
Cassette Recorder [Stop]			; Остановить магнитофон и закрыть телепортационное окно в адресе 1232 вернув команду EX AF, AF'

BASIC <-- LOAD ""DATA a$() ENTER		; Выполнить BASIC фрагмент натуральным способом
Cassette Recorder [Play]			; Включить магнитофон на воспроизведение

BASIC <-- PRINT a$ ENTER			; Выполнить BASIC фрагмент натуральным способом
